// void, Obj this, point pt
Building me;
Settlement sett;

me = .AsBuilding();
sett = me.settlement;
//pr(pt.x);
//pr(pt.y);
EnvWriteString(sett, "tribute_people", "on");
EnvWriteString(sett, "stoptribute_people", "off");

if(EnvReadString(sett, "tribute_gold") == "")
	EnvWriteString(sett, "tribute_gold", "off");
if(EnvReadString(sett, "tribute_food") == "")
	EnvWriteString(sett, "tribute_food", "off");    

//EnvWriteString(sett, "tribute_people_target", it.name);
EnvWriteInt(sett, "tribute_people_target_x", pt.x);
EnvWriteInt(sett, "tribute_people_target_y", pt.y);

UserNotification("tribute people", "", Point(pt.x, pt.y), me.player); 

return;
